function saveXML(filename, data)
% SAVEXML(filename,data) speichert Fundorte in filename.xml
% data ist structarray("x",..,"y",.,"farbe",..) 	 		          
fID = fopen(filename, 'w');

%gibt xml ausgabe in Konsole aus
fprintf( '<?xml version="1.0" encoding="UTF-8"?>\n<Fundorte>\n\t<Einheit>cm</Einheit>\n');

%speichert ausgabe in datei
fprintf( fID, '<?xml version="1.0" encoding="UTF-8"?>\n<Fundorte>\n\t<Einheit>cm</Einheit>\n');

numberofelements = size(data,2);

for ii = 1:numberofelements
	
	%gibt xml ausgabe in Konsole aus
	fprintf('\t<Kugel>\n\t\t<x>%i</x>\n\t\t<y>%i</y>\n\t\t<Farbe>%s</Farbe>\n\t</Kugel>\n', [data(ii).x, data(ii).y, data(ii).farbe]);
	
	%speichert ausgabe in datei
	fprintf( fID, '\t<Kugel>\n\t\t<x>%i</x>\n\t\t<y>%i</y>\n\t\t<Farbe>%s</Farbe>\n\t</Kugel>\n', [data(ii).x, data(ii).y, data(ii).farbe]);
	
end


%gibt xml ausgabe in Konsole aus
fprintf('</Fundorte>\n');

%speichert ausgabe in datei
fprintf(fID,'</Fundorte>\n');
